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Abstract. 

This paper concentrates on four key tools for performing star cluster simulations 
developed during the last decade which are sufficient to handle all the relevant 
dynamical aspects. First we discuss briefly the Hermite integration scheme which 
is simple to use and highly efficient for advancing the single particles. The main 
numerical challenge is in dealing with weakly and strongly perturbed hard binaries. 
A new treatment of the classical Kustaanheimo-Stiefel two-body regularization has 
proved to be more accurate for studying binaries than previous algorithms based on 
divided differences or Hermite integration. This formulation employs a Taylor series 
expansion combined with the Stumpff functions, still with one force evaluation per 
step, which gives exact solutions for unperturbed motion and is at least comparable 
to the polynomial methods for large perturbations. Strong interactions between hard 
binaries and single stars or other binaries are studied by chain regularization which 
ensures a non-biased outcome for chaotic motions. A new semi-analytical stability 
criterion for hierarchical systems has been adopted and the long-term effects on the 
inner binary are now treated by averaging techniques for cases of interest. These 
modifications describe consistent changes of the orbital variables due to large Kozai 
cycles and tidal dissipation. The range of astrophysical processes which can now 
be considered by N-body simulations include tidal capture, circularization, mass 
transfer by Roche-lobe overflow as well as physical collisions, where the masses and 
radii of individual stars are modelled by synthetic stellar evolution. 
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1. Introduction 



The study of self-gravitational iV-body systems by direct integration 
poses many technical challenges which must be addressed. However, 
progress during the last decade now enables such problems to be tackled 
with confidence. In this personal review of recent developments, we 
concentrate on four main numerical tools which appear to be sufficient 
for the task in hand. The corresponding algorithms may be summarized 
under the following headings: 

• Hermite integration 

• Two-body regularization 

• Chain regularization 

• Hierarchical systems 
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These topics are discussed briefly in the subsequent sections, to- 
gether with an outline of current applications. Given adequate tools, 
a massive effort is still required in order to develop an efficient star 
cluster simulation code but these aspects are beyond the scope of the 
present contribution. 

2. Hermite Scheme 

Although the Hermite integration scheme was developed for the special- 
purpose HARP computer (Makino 1991), it is also proving highly effec- 
tive for standard workstations as well as conventional supercomputers. 
Since coding is now somewhat simpler than for the traditional di- 
vided difference formulation (Ahmad and Cohen 1973, Aarseth 1985), 
it should be considered the method of choice for direct N-body simu- 
lations. It may also be remarked that Hermite integration is actually 
more accurate than divided differences for the same order. 

The main idea is again to employ a fourth-order force polynomial 
but now the two first terms are evaluated by explicit summation over 
all N particles, thereby enabling two corrector terms to be formed. At 
first sight it may seem rather expensive to extend the full summation 
to the force derivative since this also requires prediction of velocities. 
However, simplicity as well as increased accuracy combine to outweigh 
the drawback of extra operations, particularly if block-step predictions 
are introduced. We expand a Taylor series for the force F and its first 
derivative for each particle up to the third derivative about the 
reference time t as 

F = F + F^t + iF^ 2 + iFi 3) t 3 , (1) 
F« = F^+F^ + ^V. (2) 

Substituting F^ from (2) into (1) and simplifying then yields the third 
derivative corrector 

F( 3) = (2(F -F) + (Fi 1) + F( 1 ))t)^. (3) 
Similarly, substituting (3) into (1) gives the second derivative corrector 
F< 2) = (-3(F - F) - (2F« + F«)i)|. (4) 

Using Fo and Fq 1 ^ evaluated at the beginning of a time-step, the co- 
ordinates and velocities are first predicted to order F^ for all particles. 
Following determination of the new F and by summation over all 
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the contributions, the two higher derivatives are obtained by (3) and 
(4). This gives rise to corrector terms for coordinates and velocities 
given by 

Ar, = ^At' + ^F^At 5 , 

Av, = ±F< 2) At 3 + ^ 3) At 4 . (5) 

Given the high-order derivatives, individual time-steps can now be 
assigned in the usual way from some suitable convergence criterion. 

The overheads of predicting N coordinates and velocities at each 
time-step can be reduced considerably by adopting so-called hierarchi- 
cal time-steps (McMillan 1986), where the indicated values are trun- 
cated to be factor 2 commensurate. The apparent inefficiency of just a 
few particles sharing the same (small) step and yet requiring one full 
prediction is compensated by having a distribution of discrete levels 
(typically 16 for N ~ 10 4 ) such that the number of predictions is sig- 
nificantly reduced with respect to the continuous case (say by factor of 
100). This scheme is particularly suitable for the special-purpose HARP 
computers but lends itself equally well to other architectures, including 
parallel supercomputers (Spurzem 1998). Somewhat surprisingly, the 
workstation code NBDDY6 which is based on the Ahmad-Cohen (1973) 
neighbour scheme (Makino and Aarseth 1992, Aarseth 1994) is in fact 
slightly faster and more stable than the older NBDDY5 code for N = 1000 
single particles and the same number of steps. 



3. Two-Body Regularization 

The early 1970's saw the introduction of the Kustaanheimo-Stiefel 
(1965) regularization for treating close encounters and hard binaries 
in iV-body simulations (Bettis and Szebehely 1972, Aarseth 1972) and 
the elegant KS method has proved to be very resilient. However, even a 
regularized two-body solution is subject to small but systematic errors 
when studied over long times. In order to avoid this undesirable feature, 
the concept of energy stabilization has been tried for weak perturba- 
tions (Aarseth 1985). Although this procedure ensures that the orbit is 
constrained to have the correct energy arising from the perturbation, 
the corresponding angular momentum is no longer conserved so well. 

The subsequent exploitation of adiabatic invariance (Mikkola and 
Aarseth 1996) by the so-called slow-down principle tends to alleviate 
this imperfection since now one KS orbit may represent a number of 
physical periods by augmenting the perturbation itself and neglecting 
short-period effects. As for the earlier claim that a time-symmetric KS 
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method would be superior (Funato et al. 1996), it now appears that the 
requirement of variable time-steps for perturbed orbits cannot be ac- 
commodated (Kokubo et al. 1998). So far there is no evidence that the 
resulting eccentricities of cluster binaries studied by the stabilization 
scheme cannot be trusted, especially bearing in mind that the long-term 
evolution of most binaries is predominantly subject to discrete changes 
of a random nature. The case of long-lived hierarchical systems deserves 
special consideration, however, but here additional effects should also 
be considered, as discussed in a subsequent section. 

An alternative KS regularization scheme has been presented recently 
(Mikkola and Aarseth 1998) which achieves a high accuracy without 
extra cost. This new approach is based on the idea of a truncated Taylor 
series, where additional correction terms represent the neglected higher 
orders and which yields exact solutions in the unperturbed case. The 
new algorithm is again of Hermite type and will be outlined in the 
following. 

First, coordinates and velocities of the perturbers are predicted in 
the usual way (i.e. to first order), whereas the regularized coordinates 
and velocities (U, U') are predicted to highest order. Here U^^U^ 5 ^ 
include the modified Stumpff (1962) functions 



^> = »!£^%. (•) 



where the argument is related to the time-step by z = — ^/iAr 2 and h is 
the specific binding energy. These coefficients only deviate slightly from 
unity and a twelfth-order expansion (re-evaluated every step) appears 
sufficient. After transforming the physical coordinates and velocities 
to global values, the predictor cycle is completed by evaluating the 
perturbing acceleration F as well as its explicit derivative F. 

Because of the insufficient accuracy of the predicted deviation from 
unperturbed motion at the end of a step, the corrector cycle employs 
an iteration. Setting Q = —\h, the basic equation of motion takes the 
familiar form 

U (2) = -QU + ±r£ T F, (7) 

where £(U) is a 4 x 3 linear matrix and r = U • U is the separation. We 
express the new KS acceleration and its derivative (where F' = rF) at 
the start of a step as 

U{, 2) = -fZoUo + f^, (8) 
U{, 3) = -ft U^ + f( 3) , (9) 

where = ^rQ, with Q = £ T F, is the perturbed force contribution 
evaluated after the previous predictor cycle. 
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The two next Taylor series terms are constructed from the Hermite 
scheme. Using the current value of h (and Q), predicted to fourth order, 
we form the new perturbative functions at the end of the step 

f( 2 ) = (fi<, - fi)u + ±rQ, (10) 
f( 3 ) = (n - n)u' - fl'U + ±r'Q + ±rQ', (11) 

from which the corrector derivatives i'q 4 '' , are recovered by the 
Hermite rule (Makino 1991). 

The expressions for and Uq 5 ^ are readily formed in analogy 
with Eqs. (8) and (9) which yield 

U« = -^oU^+fr, (12) 
U[, 5) = -^ ui 3) +f,S 5) . (13) 

From Eqs. (8) - (13), the provisional solution for U, U' is then obtained 
by the general expression (cf. Mikkola and Aarseth 1998), which con- 
tains the Stumpff functions. The treatment of the energy remains the 
same as for standard Hermite based on tt' = — U' • Q and the physical 
time is obtained from integrating t' = U • U which also involves Stumpff 
functions. Substituting for U^ 2 ), we write the second derivative as 

rt 2) = n XJ ■ Q - f W Q _ u' Q'. (14) 

The two corrector terms constructed from fi' and are added to the 
predicted value without any Stumpff functions to yield an improved 
solution for f2 at the start of the next iteration or at the end point. 

Subsequent iterations repeat the procedure above, starting from 
Eq. (10) without re-evaluating the physical perturbation and its deriva- 
tive. Thus the new values of Eqs. (10) and (11) are based on the 
improved solution for U, U' and r,r', as well as the new f2. In the 
present treatment, one iteration yields a significant improvement for 
modest perturbations and experience so far indicates that this may 
also be sufficient for strong interactions because of the shortening of 
the stepsize At (cf. Aarseth 1994). 

The corrector cycle ends by specifying new derivatives for use in 
the next prediction, as well as saving the perturbative derivatives (10) 
and (11) required for the Hermite scheme. This is completed by re- 
initializing Eqs. (8) and (9) at the end point, substituting f( 2 ),f( 3 ) as 
well as the iterated values of £1' and f^ 2 ). It is advantageous to employ 
the corrected values of r and r' for this purpose; the re-evaluation of 
f ( 2 ) and f ( 3 ) is fast and also benefits the final quantities U^ 2 -* and U*- 3 ^ 
to be used in the next prediction. A more accurate expression of the 
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fourth KS derivative at the end of the interval is obtained by including 
the next order by 

U(4) =U (4) +U (5) AT) (15) 

and similarly for the third derivative of the energy, 

ft( 3 ) = n& + ^(4) Ar _ ( 16 ) 

The above scheme has been implemented in the state of the art codes 
NB0DY4 and NBDDY6 and has proved itself in large-scale simulations. 
Accuracy tests obtained by a toy code shows that high accuracy can 
be obtained with 30 steps per orbit for relatively weak perturbations, 
which is about half that required by the old stabilization scheme. A 
significant part of this gain is due to the modifications by the Stumpff 
coefficients, although the basic Taylor series (or Encke-type) formu- 
lation is also considerably more accurate than the standard method. 
The number of operations for a typical step is not much larger in the 
new method, including the overhead for the Stumpff functions and one 
iteration in the corrector. Hence the computational effort is less for 
typical calculations, although this depends on the actual number of 
perturbers. Finally, we remark that the Stumpff method also includes 
the slow-down scheme in exactly the same way as before. 



4. Chain Regularization 

The concept of chain regularization is simple, yet the mathematical 
formulation is quite technical and this has acted as an impediment to 
wider usage. However, it enables new types of problems to be studied 
and is therefore worth the extra effort. The basic idea is a generaliza- 
tion of three-body regularization (Aarseth and Zare 1974) which treats 
two perturbed KS solutions with respect to a common reference body, 
where each two-body solution is described by regular equations. Thus 
an extension to four participating bodies merely introduces one more 
perturbed KS solution, although the formalism is somewhat different 
(Mikkola and Aarseth 1990). Once the step from three to four particles 
has been mastered, the general case becomes feasible (Mikkola and 
Aarseth 1993). 

The essential feature of chain regularization is that dominant in- 
teractions along the chain itself are treated as perturbed KS solutions 
and all the other attractions are included as perturbations. Hence it 
becomes imperative to select the chain vectors in such a manner as to 
minimize the perturbations. Since we are dealing with dynamical inter- 
actions, the chain vectors need to be redrawn in response to changing 
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configurations. Fortuitously, all the relevant decision-making constitute 
a minor overhead here since the integration is carried out by the high- 
order Bulirsch-Stoer (1966) scheme and a certain elasticity is tolerated 
as regards switching to more favourable chain vectors. 

The equations of motion are derived from a regularized Hamiltonian 
of the form 



where H is expressed in terms of the coordinates and momenta and 
E is the internal system energy. Here the function g is given by the 
corresponding time transformation 



and choosing the inverse Lagrangian energy (L = T+$) ensures regular 
solutions for any chain separation R^. 

The treatment begins by selecting a compact subsystem of three or 
four particles; i.e. so-called B+S or B+B type. External perturbers are 
chosen in analogy with the KS implementation and the internal inte- 
gration includes any perturbation effect which also tends to change the 
total energy according to its separate equation of motion. At the same 
time, the cm. motions are advanced by the standard Hermite scheme 
with due attention to the slightly modified form of the corresponding 
acceleration which requires a differential correction. 

The analogy with KS does not hold in one important respect since 
the chain membership may change before termination occurs. Thus 
an initial subsystem of four members may lose one member due to 
ejection, or an approaching perturber - a single particle or binary - 
may be added. Alternatively, the membership may also change through 
physical collision. All the relevant corrections and re-initializations are 
performed in situ. Hence the use of chain variables is also highly benefi- 
cial for the evaluation of nearly singular quantities. Chain termination 
usually occurs when a binary becomes well separated from one or two 
other members in which case the binary is accepted for KS treatment, 
whereas the remaining membership is initialized by the Hermite scheme 
or even as a second KS system. The actual decision-making also takes 
into account the cluster environment and is therefore quite involved. 

Cluster simulations of primordial binaries frequently involve interac- 
tions of two binaries where the size of one is much less than the other. 
In such cases even the powerful chain method becomes prohibitive 
because the shortest period is a small fraction of the local crossing 
time. Fortunately the principle of slow-down applied to weakly per- 
turbed KS binaries can also be employed here (Mikkola and Aarseth 
1996). This permits a consistent study of binaries with arbitrarily short 



T*=g(H-E), 



(17) 



dt = gdr 



(18) 
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periods which would otherwise have to be treated as inert systems. The 
implementation itself differs from the KS case since here we adjust the 
slow-down factor continuously according to the maximum apocentre 
perturbation exerted by the other chain members, rather than choosing 
an appropriate discrete level (factor of 2) at each apocentre passage. 

Since the strong interactions studied by the chain method are usually 
of short duration, the simulation code only allows one such case to be 
considered at a time for technical reasons. However, there is provision 
for studying one triple as well as one quadruple system by unperturbed 
three-body (Aarseth and Zare 1974) and chain (Mikkola and Aarseth 
1990) regularization. Given a few hundred critical events in a typical 
cluster simulation, the latter procedures are usually not needed but this 
may change with the addition of more primordial binaries. 



5. Hierarchical Systems 

The Solar neighbourhood contains many examples of multiple systems 
where the inner component of a binary is itself a binary, and levels of 
higher multiplicity also exist. Likewise, hard binaries in star clusters 
may acquire an outer component with sufficiently small eccentricity to 
be stable over many orbits. Hierarchical triples may be formed by the 
classical three-body capture mechanism in which the binary itself acts 
mainly as a point-mass. However, in clusters with significant binary 
populations such systems are more likely to form in strong interactions 
between two binaries since this involves two-body encounters. The sec- 
ond formation process was already identified in scattering experiments 
with colliding binaries which yielded a high percentage of positive out- 
comes (Mikkola 1983). Thus one way for such triples to become stable 
requires the impact parameter to exceed some critical value and yet 
be sufficiently small for the weakest binary to be disrupted, but other 
processes are also favoured, including exchange. 

Given a newly formed hierarchical triple, the question of long-term 
stability naturally arises. Depending on the period ratio, the direct 
calculation of a perturbed inner binary can be quite time-consuming 
even with KS regularization. However, since the corresponding semi- 
major axis may not be subject to any secular effects it becomes possible 
to adopt the centre-of-mass approximation and thereby only neglect 
cyclical changes of the eccentricity. Various empirical criteria have been 
obtained by fitting the results of systematic three-body calculations for 
a restricted set of parameters (Harrington 1977, Eggleton and Kiseleva 
1995). Based on these results, the so-called merger procedure has been 
employed for some time (Aarseth 1985). Thus provided the stability 
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condition is satisfied, the inner binary is replaced by its combined mass 
to facilitate KS treatment of the outer orbit. 

A more rigorous approach based on correspondence with the chaos 
boundary in the binary-tides problem (Mardling 1995) has yielded a 
semi-analytical stability criterion which holds for quite large mass ratios 
and arbitrary outer eccentricities (Mardling and Aarseth 1998). Here 
the critical outer pericentre distance is given in terms of the inner 
semi-major axis, dj n , by 

2/5 



R° ut = C 



/-, , \ U + e out) 

(1 + Qout) 



(1 - eoutY' 1 . 

where q ou t = m^/{rn\ + 771-2) is the outer mass ratio, e ou t is the cor- 
responding eccentricity and C ~ 2.8 is determined empirically. This 
criterion is only valid for coplanar prograde motion and still ignores a 
weak dependence on the inner eccentricity. However, the general case 
of inclined orbits exhibit increased stability so that Eq. (19) represents 
an upper limit. Further tests suggests an inclination correction factor 
/ = 1 — 0.3z/180 (with i in degrees) which has been adopted in practi- 
cal simulations; this is also in qualitative agreement with the original 
stability condition for retrograde orbits (Harrington 1972). The merger 
treatment is only allowed while the pericentre condition is satisfied, 
after which the inner binary is re-initialized. 

A further refinement is included when the outer component itself is 
a binary. In the case of a B + B configuration, the smallest binary 
plays the role of the outer body in a triple. Since the correspond- 
ing chaos boundary is not very sensitive to a second extended object 
(Mardling 1991), we adopt an additional correction factor /1 = / + 
0. lmin(ai n / 0,2 , (12/ ciin), with 02 representing the second semi-major 
axis. We also mention here that even double hierarchies may be formed, 
where a system of type B + S or B + B itself acquires an outer bound 
component. Such configurations do occur occasionally and procedures 
have therefore been developed for their special treatment. 

The criterion (19) above is concerned with long-term stability and 
hence the absence of escape. However, it is also of interest to consider 
the possibility of exchange between the outer component and one mem- 
ber of the inner binary. According to classical developments (Zare 1977, 
Szebehely and Zare 1977), the critical value for exchange in a coplanar 
prograde triple is given by 

(C E)mt ~ -2(m 1+ m 2 + m 3 y (2 ° } 

where c is the angular momentum and the functions f(p),g(p) are 
expressed in terms of the masses, with p determined by iteration from 
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a fifth-order algebraic equation for the collinear equilibrium points. Nu- 
merical tests show that the chaos boundary given by Eq. (19) lies above 
the exchange boundary when the masses are comparable and the latter 
only begins to overlap above q ou t ~ 5. Application of the exchange 
criterion is therefore less useful in practical calculations. We also note 
that once an exchange occurs the final evolution will inevitably lead to 
escape. 

The long-term evolution of a hierarchical triple is characterized by 
cyclic oscillations of the inner eccentricity where the amplitude depends 
on the inclination. The so-called Kozai effect (Kozai 1962) has received 
much attention recently in connection with external planetary systems 
but there is also an early example from N-body simulations (van Albada 
1968) which points to the relevance for star clusters. Various analytical 
tools have been employed in order to model this process in some detail, 
including tidal dissipation for high eccentricities (Mardling and Aarseth 
1999). Among the useful quantities which can be calculated theoreti- 
cally (Heggie 1995) are the time-scale for a complete oscillation, Tk, 
as well as its maximum value, e max - 

Since the time-scale for the Kozai cycle is usually much greater 
than the Kepler period, the merger scheme for hierarchical triples lends 
itself particularly well to a semi- analytical treatment. At present only 
systems with e max > 0.8 are considered since smaller amplitudes are 
less likely to result in tidal activity. We have used a double averaging 
procedure (Eggleton 1997, Mardling and Eggleton 1998) to calculate 
the evolution of such systems in terms of the inner Runge-Lenz vector 
and angular momentum vector. Thus some examples show that inclina- 
tions near 90° may induce tidal circularization even if oblateness effects 
are included. Clearly further developments of this experimental ap- 
proach is needed in order to improve the modelling of these complicated 
processes. 



6. Astrophysical Applications 

The realistic simulation of star cluster dynamics requires a variety of 
astrophysical processes to be considered. In particular, the implemen- 
tation of consistent stellar evolution enables the study of mass loss and 
finite-size effects. This is an ongoing project which has been outlined 
elsewhere (Aarseth 1996) and now employs an improved description of 
Roche mass transfer and physical collisions (Tout et al. 1997). Partic- 
ular emphasis has been devoted to the modelling of chaotic motions 
and tidal circularization which form a link between an initial binary 
distribution and the Roche stage (Mardling and Aarseth 1999). In 
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Figure 1. Logarithmic plot of single stars and binaries as functions of time in Myr. 



particular, it is found that very high eccentricities (e > 0.999) are 
produced in stable hierarchies or by exchange and these in turn lead to 
orbital shrinkage by tidal dissipation. Primordial binaries also leave an 
imprint in the form of high-velocity escapers. At the same time, more 
general cluster simulations have yielded much insight into dynamical 
evolution (McMillan et al. 1992, Aarseth and Heggie 1998, Portegies 
Zwart et al. 1998). 

The modelling of synthetic stellar evolution is based on fast look- 
up tables for the radius, luminosity and type as a function of the 
initial mass and age (cf. Tout et al. 1997). Instantaneous mass loss 
due to stellar winds or supernovae explosions are adopted for the ad- 
vanced stages. An energy-conserving integration scheme is preserved 
by including relevant corrections and re-initializations. The standard 
open cluster model includes 10 4 single stars with 5% primordial hard 
binaries. Once the most massive single stars have evolved, the binaries 
dominate the mass segregation and increase their central abundance 
significantly with increased disruption probability. Even so, the origi- 
nal binary population is not depleted preferentially such that there is 
always an energy source which prevents core collapse. This behaviour 
is illustrated well in the figure which displays the bound membership. 

In conclusion, the algorithms presented above have proved highly 
efficient for star cluster simulations. Hopefully these numerical tools 
will also play a part in future efforts involving more powerful hardware. 
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1. Implementation 

l \ProvidesFile{klu9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9.5, 9/11, 10/12, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{7, 

3 \9setf ontsize\normalsize\@ixpt{ll}'/, 

4 \abovedisplayskip 8.5\p@ \9plus3\pS \9minus4\p@ 

5 \abovedisplayshortskip \z@ \9plus2\p9 

6 \belowdisplayshortskip 4\p@ \9plus2\p9 \Sminus2\p9 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \9setf ontsize\small\0viiipt{9 . 5}°/, 

12 \abovedisplayskip 6\p@ \0plus2\pS \®miims4\p@ 

13 \abovedisplayshortskip \z(3 \9plus\p9 

14 \belowdisplayshortskip 3\p(S \(3plus\p9 \9miims2\p@ 

15 \def \(31isti{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \aplus\p(S \aminus\p@ 

17 \parsep 2\p3 \3plus\p® \aminus\pS 

18 \itemsep \parsep}'/, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{'/, 

22 \3setf ontsize\f ootnotesize\aviipt{8}'/ 

23 \abovedisplayskip 4\pa \aplus2\pa \aminus2\p3 

24 \abovedisplayshortskip \z3 \9plus\p9 

25 \belowdisplayshortskip 2\p<S \0plus\p® \9minusl\p9 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pO \9plus\p@ \<Sminus\pO 

28 \parsep l\p<3 \9plus\p@ \Sminus\pa 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\9setf ontsize\scriptsize\9vipt\9viipt} 

33 \newcommand\little{\Ssetf ontsize\little\@vpt\9vipt} 

34 \newcommand\tiny{\Ssetf ontsize\tiny\9vpt\9vipt} 

35 \newcommand\large{\9setf ontsize\large\@xpt\@xiipt} 

36 \newcommand\Large{\9setf ont size\Large\9xi ipt{ 14}} 

37 \newcommand\LARGE{\9setf ontsize\LARGE\9xivpt{18}} 

38 \newcommand\huge{\Ssetf ontsize\huge\9xviipt{22}} 

39 \newcommand\Huge{\Ssetf ontsize\Huge\9xxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\pS} 

43 \setlength\headheight{12\p9} 
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44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, WT^K. calculates 
textwidth out of \paperwidth. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}°/, 

58 \addtolength\atempdima{-\textwidth}7, 

59 \divide\@tempdima by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\3tempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}'/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \asettopoint\atempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\atempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\atempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \3tempdima 

88 \evensidemargin \@tempdima 
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These calculations are a lot easier, \textheight should have been set already. This does not 
check for the correct placement of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\(3tempdima{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima} 

94 \addtolength\atempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\atempdimb by -4pc 

98 \asettopoint\atempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\9tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\atempdima} 

106 \setlength\idaboxheight{\atempdima} 

107 \advance\id3boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p<3} 

110 \setlength{\skip\f ootins}{9\p(3 \@plus 4\p0 \0minus 2\p<3} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\p<3 \0plus l\p@ \0minus l\p<3} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\lef tmarginii}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmarginiv}{l . 4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{°/, 

122 \lef tmargin \leftmargini 

123 \topsep 8\p@ \0plus2\p0 \@minus2\p<§ 

124 \partopsep 2\p@ \<Splus l\p(3 \9minus l\p@ 

125 \itemsep 4\p(3 \9plus 2\p@ \9minus l\p@ 

126 \parsep 4\p@ \<Splus 2\p@ \<Sminus l\p0 } 

127 \def \01istii{'/, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(3plus 2\p(S \0minus l\p@ 

132 \parsep 2\p(S \<Splus l\p9 \<Sminus I\p0 

133 \itemsep \parsep} 
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134 \def \@listiii{°/, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \Oplus l\p<3 \<Sminus l\p@ 

139 \parsep \z3 

140 \partopsep l\p@ \Oplus 0\p3 \9minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istiv{'/, 

143 \setlength{\leftmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\lef tmargin}{\lef tmarginv}'/, 

148 \setlength{\labelwidth}{\lef tmarginv}'/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \<31istvi{'/, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\lef tmarginvi} 1 /. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\aiisti\01istl 

155 \31isti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f Ioatsep{l0\p3 \@plus 2\p<§ \@minus 2\p<8} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \Sminus 4\p<§} 

158 \setlength\intextsep{10\p@ \0plus 2\p@ \Sminus 2\p®} 

159 \setlength\dblf loatsep{10\p<3 \0plus 2\p® \@minus 2\p®} 

160 \setlength\dbltextf loatsep{18\p<3 \0plus 2\p@ \0minus 4\p<3} 

Separation on float pages 

161 \setlength\<3fptop{0\p<3 \<Splus If il} 

162 \setlength\<3fpsep{8\p<3 \@plus 2f il} 

163 \setlength\afpbot{0\p(3 \0plus If il} 

164 \setlength\<3dblfptop{0\p<3 \@plus If il} 

165 \setlength\(3dblfpsep{8\p<3 \@plus 2f il} 

166 \setlength\adblfpbot{0\pa \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

l \ProvidesFile{klut9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{7, 

3 \3setf ontsize\normalsize\@ixpt{10 . 5}% 

4 \abovedisplayskip 8.5\p@ \9plus3\p@ \@minus4\p@ 

5 \abovedisplayshortskip \z9 \0plus2\p9 

6 \belowdisplayshortskip 4\p@ \9plus2\pa \Sminus2\p9 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \9setf ontsize\small\@viiipt{9}'/, 

12 \abovedisplayskip 6\p(S \@plus2\p@ \®miims4\p@ 

13 \abovedisplayshortskip \z(3 \9plus\p9 

14 \belowdisplayshortskip 3\p® \9plus\p9 \9miims2\p9 

15 \def \91isti{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \aplus\p(S \0minus\pS 

17 \parsep 2\p@ \(3plus\p<S \<Sminus\p(S 

18 \itemsep \parsep}'/, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{'/, 

22 \0setf ontsize\f ootnotesize\(Sviipt{8}'/ 

23 \abovedisplayskip 4\p@ \@plus2\p@ \9minus2\pS 

24 \abovedisplayshortskip \z(3 \9plus\p9 

25 \belowdisplayshortskip 2\p<S \0plus\p® \Ominusl\pa 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pO \9plus\p@ \<Sminus\pO 

28 \parsep l\p<3 \9plus\p@ \0minus\p0 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\(3setf ontsize\scriptsize\9vipt\(3viipt} 

33 \newcommand\little{\@setf ontsize\little\Svpt\9vipt} 

34 \newcommand\tiny{\(Ssetf ontsize\tiny\9vpt\avipt} 

35 \newcommand\large{\asetf ontsize\large\@xpt{ll .5}} 

36 \newcommand\Large{\asetf ont size\Large\@xi ipt{ 14}} 

37 \newcommand\LARGE{\asetf ontsize\LARGE\Sxivpt{18}} 

38 \newcommand\huge{\@setf ontsize\huge\8xviipt{22}} 

39 \newcommand\Huge{\Ssetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\pa} 
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44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, WT^K. calculates 
textwidth out of \paperwidth. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}°/, 

58 \addtolength\atempdima{-\textwidth}7, 

59 \divide\@tempdima by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\3tempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}'/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \asettopoint\atempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\atempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\atempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \3tempdima 

88 \evensidemargin \@tempdima 
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These calculations are a lot easier, \textheight should have been set already. This does not 
check for the correct placement of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\(3tempdima{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima} 

94 \addtolength\atempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\atempdimb by -4pc 

98 \asettopoint\atempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\9tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\atempdima} 

106 \setlength\idaboxheight{\atempdima} 

107 \advance\id3boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p<3} 

110 \setlength{\skip\f ootins}{9\p(3 \@plus 4\p0 \0minus 2\p<3} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\p<3 \0plus l\p@ \0minus l\p<3} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\lef tmarginii}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmarginiv}{l . 4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{°/, 

122 \lef tmargin \leftmargini 

123 \topsep 8\p@ \0plus2\p0 \@minus2\p<§ 

124 \partopsep 2\p@ \<Splus l\p(3 \9minus l\p@ 

125 \itemsep 4\p(3 \9plus 2\p@ \9minus l\p@ 

126 \parsep 4\p@ \<Splus 2\p@ \<Sminus l\p0 } 

127 \def \01istii{'/, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(3plus 2\p(S \0minus l\p@ 

132 \parsep 2\p(S \<Splus l\p9 \<Sminus I\p0 

133 \itemsep \parsep} 
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134 \def \@listiii{°/, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \Oplus l\p<3 \<Sminus l\p@ 

139 \parsep \z3 

140 \partopsep l\p@ \Oplus 0\p3 \9minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istiv{'/, 

143 \setlength{\leftmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\lef tmargin}{\lef tmarginv}'/, 

148 \setlength{\labelwidth}{\lef tmarginv}'/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \<31istvi{'/, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\lef tmarginvi} 1 /. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\aiisti\01istl 

155 \31isti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f Ioatsep{l0\p3 \@plus 2\p<§ \@minus 2\p<8} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \Sminus 4\p<§} 

158 \setlength\intextsep{10\p@ \0plus 2\p@ \Sminus 2\p®} 

159 \setlength\dblf loatsep{10\p<3 \0plus 2\p® \@minus 2\p®} 

160 \setlength\dbltextf loatsep{18\p<3 \0plus 2\p@ \0minus 4\p<3} 

Separation on float pages 

161 \setlength\<3fptop{0\p<3 \<Splus If il} 

162 \setlength\<3fpsep{8\p<3 \@plus 2f il} 

163 \setlength\afpbot{0\p(3 \0plus If il} 

164 \setlength\<3dblfptop{0\p<3 \@plus If il} 

165 \setlength\(3dblfpsep{8\p<3 \@plus 2f il} 

166 \setlength\adblfpbot{0\pa \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klul0.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcommand\normalsize{°/, 



3 \@setf ontsize\normalsize\@xpt\@xiipt 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\Qlisti\01istI} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setfontsize\small\@ixpt{ll}7, 

12 \abovedisplayskip 8.5\p(3 \@plus3\p@ \@mimis4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \<3minus2\p@ 

17 \parsep 2\p@ \@plus\p<3 \@minus\p@ 

18 \itemsep \parsep}°/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/, 

22 \0setf ontsize\f ootnotesize\@viiipt{9 . 5} '/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@mimis2\p@ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@mimis\p@ 

28 \parsep 2\p@ \@plus\p@ \@mimis\p@ 

29 \itemsep \parsep}°/, 

30 \belowdisplayskip \abovedisplayskip 

31 } 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viipt\@viiipt}- 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt}- 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt> 

35 \newcommand\large{\@seti ontsize\large\@xiipt-[14}-} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt-[18}-} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}}- 
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1.2. Various values 

Note that \hoffset and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt}- 

52 \setlength\columnseprule{Opt} 

53 \setlength\fboxsep{3pt} 

54 \setlength\fboxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 Yfi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 YL 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\@tempdima-[-\f ootskip} 

91 \addtolength\@tempdima-[-\headheight} 

92 \addtolength\@tempdima-[-\headsep}- 

93 \setlength\@tempdimb-[\@tempdima} 

94 \addtolength\(3tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \©settopoint\@tempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }*/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 > 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\footinsH9\p© \@plus 4\p@ \@minus 2\p®}- 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-[\lef tmargini}-[2em]- 

113 \setlength-C\lef tmarginiiH2 . 2em> 
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114 \setlength-[\lef tmarginiiiHl . 87em}- 

115 \setlength-[\leitmarginiv}-{l . 7em}- 

116 \setlength{\lef tmarginvHlem} 

117 \setlength-[\leftmarginviHlem} 

118 \setlength-[\labelsepH.4em}- 

119 \setlength-[\labelwidth}-{\leftmargini} 

120 \addtolength-[\labelwidthH-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\01istl{/. 

122 \leftmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{"/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{°/. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istivC'/ t 

143 \setlength-[\leitmargin}-{\lef tmarginiv}-'/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv}-'/, 

145 \addtolength{\labelwidthH-\labelsep}-} 

146 \def \<31istv{'/. 

147 \setlength-C\leftmarginH\lef tmarginv}-'/, 

148 \setlength-[\labelwidth]-{\lef tmarginv}'/, 

149 \addtolength{\labelwidthH-\labelsep}-} 

150 \def \(31istvi{y. 

151 \setlength-[\lei tmarginHMef tmarginvi}'/, 

152 \setlength-[\labelwidth}-{\leftmarginvi]-°/, 

153 \addtolength{\labelwidthH-\labelsep}-}- 

154 \let\<31isti\@listl 

155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep{12\p@ \@plus 2\p@ \Qminus 2\p@} 

160 \setlength\dbltextfloatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \®plus lfil} 

162 \setlength\@fpsep{8\p@ \0plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus lfil} 

164 \setlength\@dblfptop{0\p@ \@plus lfil} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl0.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcommand\normalsize{°/, 



3 \@setf ontsize\normalsize\@xpt{ll . 5}°/, 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@mirms5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\Qlisti\01istI} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setfontsize\small\@ixpt{10 . 5}°/, 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \<3minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \<3minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/, 

22 \@setfontsize\iootnotesize\@viiipt{9}% 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p(3 \@plus\p@ \@minus2\p@ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}°/, 

30 \belowdisplayskip \abovedisplayskip 

31 } 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viipt\@viiipt}- 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt}- 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt> 

35 \newcommand\large{\@seti ontsize\large\@xiipt-[l4}-} 

36 \newcommand\Large{\@setfontsize\Large\@xivpt-[l8}-} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}}- 
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1.2. Various values 

Note that \hoffset and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt}- 

52 \setlength\columnseprule{Opt} 

53 \setlength\fboxsep{3pt} 

54 \setlength\fboxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 Yfi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 YL 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\@tempdima-[-\f ootskip} 

91 \addtolength\@tempdima-[-\headheight} 

92 \addtolength\@tempdima-[-\headsep}- 

93 \setlength\@tempdimb-[\@tempdima} 

94 \addtolength\(3tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \©settopoint\@tempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenHMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }*/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 > 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\footinsH9\p© \@plus 4\p@ \@minus 2\p®}- 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-[\lef tmarginiH2em]- 

113 \setlength-[\lef tmarginiiH2 . 2em> 
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114 \setlength-[\lef tmarginiiiHl . 87em}- 

115 \setlength-[\lef tmarginivHl . 7em}- 

116 \setlength{\lef tmarginvHlem} 

117 \setlength-[\leftmarginviHlem} 

118 \setlength-[\labelsepH.4em}- 

119 \setlength-C\labelwidthH\lef tmargini} 

120 \addtolength-[\labelwidthH-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\01istl{/. 

122 \leftmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{"/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{°/. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istivC'/ t 

143 \setlength-[\leitmargin}-{\lef tmarginiv}-'/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv}-'/, 

145 \addtolength{\labelwidthH-\labelsep}-} 

146 \def \<31istv{'/. 

147 \setlength-C\leftmarginH\lef tmarginv}-'/, 

148 \setlength-[\labelwidth]-{\lef tmarginv}'/, 

149 \addtolength{\labelwidthH-\labelsep}-} 

150 \def \(31istvi{y. 

151 \setlength-[\lei tmarginHMef tmarginvi}'/, 

152 \setlength-[\labelwidth}-{\leftmarginvi]-°/, 

153 \addtolength{\labelwidthH-\labelsep}-}- 

154 \let\<31isti\@listl 

155 \(31isti 



1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\floatsep{12\p@ \@plus 2\p@ \Qminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep-[12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep-[12\p@ \@plus 2\p(3 \Qminus 2\p@} 

160 \setlength\dbltextf loatsep{20\p@ \®plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\<3fptop{0\p@ \®plus lfil} 

162 \setlength\@fpsep{8\p<3 \0plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus lfil} 

164 \setlength\@dblfptop-[0\p@ \Splus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutll.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/12.5, 12/14, 14/18, 17/22, 
20/25, 25/30. 

2 \renewcommand\normalsize{°/ 



3 \@setf ontsize\normalsize\@xipt{12 . 5}°/ 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z<3 \Qplus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\<aiisti\<aiistl} 
9 \normalsize 

10 \newcommand\small{7, 

11 \@setf ontsize\small\@xpt{ll . 5}7„ 

12 \abovedisplayskip 9\p@ \0plus3\p@ \0minus4\p@ 

13 \abovedisplayshortskip \z@ \0plus2\p<3 

14 \belowdisplayshortskip 5\p@ \0plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \0plus2\p@ \@minus2\p@ 

17 \parsep 2\pQ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@ixpt{10 . 5}7, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \0minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def \(§listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \<§minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep Xparsep} /, 

30 \belowdisplayskip \abovedisplayskip 
31} 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5» 

33 \newcommand\little{\@setf ontsize\little\@viipt\@viiipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}> 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin> 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
ETgX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 
Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{7o 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}7o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc} , /. 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 n 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-Q{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 >7„ 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep> 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 >7. 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\p@ \<§minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p<§} 

112 \setlength{\lef tmargini}{2em)- 
113 \setlength{\lef tmarginii}{2 . 2em> 

114 \setlength{\lef tmarginiiiMl . 87em} 

115 \setlength{\lef tmargini v}{1 . 7em} 

116 \setlength{\lef tmarginvMlem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{ .4em> 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \aiistl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ > 

127 \def \®listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \®plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{7„ 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \®plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{°/„ 

143 \setlength{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \@listv{°/„ 
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147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \setlength{\labelwidthM\leftmarginv}°/, 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{°/„ 

151 \setlength{\lef tmargin}{\lef tmarginvi} / 

152 \setlength.{\labelwidth}{\lef tmarginvi} /. 

153 \addtolength{\labelwidth}{-\labelsep}> 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p(§ \(Sminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p<3 \@plus 2\p@ \Qminus 2\p(S> 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p@> 

160 \setlength\dbltextf loatsep{20\p@ \<§plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p<3 \@plus If ill 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If ill 

164 \setlength\@dblf ptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\pQ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl2. clo> [\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 8/9, 9/10.5, 10/11.5, 11/12.5 12/13.5, 14/18, 17/22, 20/25, 
25/30. 



2 \renewcommand\normalsize{% 

3 \@setf ontsize\normalsize\@xiipt{13 . 5}% 

4 \abovedisplayskip ll\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip l\p@ \@plus 3\p@ 

6 \belowdisplayshortskip 7\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl> 
9 \normalsize 

10 \newcommand\small-[°/o 

11 \@setf ontsize\small\@xipt{12 . 5}% 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\leftmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@xpt{ll . 5}% 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def \@listi{\lef tmargin\leftmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 
31} 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@ixpt{10 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viiipt{9}} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 
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35 \newcommand\large-[\@setf ontsize\large\@xivpt{18}} 

36 \newcommand\Large{\@setf ontsize\Large\@xviipt{22}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xxpt{25}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxvpt{30}} 

39 \newcommand\Huge-[\@setf ontsize\Huge\@xxvpt{30» 

1.2. Various values 

Note that \hoff set and \voffset are both compensated. This makes the calcula- 
tions below easier. 

40 \setlength\hoff set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 
43 \setlength\headheight{12\p@> 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 
47 \setlength\marginparsep{10pt} 
48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{12pt} 

52 \setlength\columnseprule{Opt} 
53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
F/IgX calculates textwidth out of \paperwidth. We did want to support letter paper, 
but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/ 

57 \setlength\@tempdima{\paperwidth}°/o 

58 \addtolength\@tempdima{-\textwidth} / 
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59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/„ 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }% 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. This 
does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 
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99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{12\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{2em} 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginviMlem} 

118 \setlength{\labelsep>{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth>{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \@listl{% 

122 \leftmargin \leftmargini 

123 \topsep ll\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 4.5\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 6\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 6\p@ \@plus 2\p@ \@minus l\p@ > 

127 \def \@listii{°/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 6\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 3\p@ \@plus l\p@ \@minus l\p@ 
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133 \itemsep \parsep} 

134 \def \@listiii{% 

135 \lef tmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{°/„ 

143 \setlength{\lef tmargin}{\leftmarginiv}°/ 

144 \setlength{\labelwidth}{\leftmarginiv}°/ 

145 \addtolength{\labelwidth}{-\labelsep» 

146 \def \<§listv{ /. 

147 \setlength{\lef tmargin}{\leftmarginv}°/ 

148 \setlength{\labelwidth}{\leftmarginv}°/ 

149 \addtolength{\labelwidth}{-\labelsep» 

150 \def \@listvi{°/„ 

151 \setlength{\lef tmargin}{\leftmarginvi}°/ 

152 \setlength{\labelwidth}{\leftmarginvi}°/ 

153 \addtolength{\labelwidth}{-\labelsep» 
154 \let\@listi\@listl 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p©} 

160 \setlength\dbltextf loatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{10\p@ \@plus 2f il> 

163 \setlength\@fpbot{0\p@ \@plus If il> 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{10\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 



